home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX Base Documentation 1998 November
/
IRIX 6.5.2 Base Documentation November 1998.img
/
usr
/
share
/
catman
/
p_man
/
cat3
/
f90
/
pxfconst.z
/
pxfconst
Wrap
Text File
|
1998-10-30
|
9KB
|
190 lines
PXFCONST(3F) Last changed: 1-6-98
NNAAMMEE
PPXXFFCCOONNSSTT, PPXXFFIISSCCOONNSSTT, IIPPXXFFCCOONNSSTT - Returns the value associated with
symbolic constants
SSYYNNOOPPSSIISS
CCHHAARRAACCTTEERR**((_n)) _c_o_n_s_t_n_a_m_e
IINNTTEEGGEERR _i_v_a_l,, _i_e_r_r_o_r
LLOOGGIICCAALL PPXXFFIISSCCOONNSSTT,, 11
ii = IIPPXXFFCCOONNSSTT (_c_o_n_s_t_n_a_m_e)
ll = PPXXFFIISSCCOONNSSTT (_c_o_n_s_t_n_a_m_e)
CCAALLLL PPXXFFCCOONNSSTT ((_c_o_n_s_t_n_a_m,, _i_v_a_l,, _i_e_r_r_o_r))
IIMMPPLLEEMMEENNTTAATTIIOONN
UNICOS, UNICOS/mk, and IRIX systems
DDEESSCCRRIIPPTTIIOONN
On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
default when compiling programs with the MIPSpro 7 Fortran 90 compiler
or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
7.2 F77 compiler.
These functions provide a way for the Fortran programmer to get the
value of some symbolic constants defined in system header files.
IIPPXXFFCCOONNSSTT() provides an integer return value but no error checking.
If the argument passed corresponds to one of the defined constants
shown below, the return value is the integer value associated with the
constant; if the argument is not a defined constant, the return value
is meaningless. PPXXFFIISSCCOONNSSTT() confirms whether the argument is a valid
constant. PPXXFFIISSCCOONNSSTT() returns .TRUE only if IIPPXXFFCCOONNSSTT() would return
a valid value for the same _c_o_n_s_t_n_a_m_e.
Upon successful completion, the subroutine PPXXFFCCOONNSSTT() returns in _i_v_a_l
the integer value associated with the constant described by _c_o_n_s_t_n_a_m_e.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
kind unless documented otherwise. On UNICOS and UNICOS/mk, default
kind is KKIINNDD==88 for integer, real, complex, and logical arguments; on
IRIX, the default kind is KKIINNDD==44.
The following is a list of arguments for these subroutines:
_c_o_n_s_t_n_a_m_e An input character variable that represents the name of a
constant. _c_o_n_s_t_n_a_m_e is case-sensitive, and trailing blanks
in the argument are ignored.
The following are valid values for _c_o_n_s_t_n_a_m_e. The second
column contains the system header file where the symbolic
constant is defined, or the standard where it is defined.
''FF__GGEETTLLKK'' <<ffccnnttll..hh>>
''FF__SSEETTLLKK'' <<ffccnnttll..hh>>
''FF__SSEETTLLKKWW'' <<ffccnnttll..hh>>
''FF__RRDDLLCCKK'' <<ffccnnttll..hh>>
''FF__WWRRLLCCKK'' <<ffccnnttll..hh>>
''FF__UUNNLLCCKK'' <<ffccnnttll..hh>>
''FF__DDUUPPFFDD'' <<ffccnnttll..hh>>
''FF__GGEETTFFDD'' <<ffccnnttll..hh>>
''FF__SSEETTFFDD'' <<ffccnnttll..hh>>
''FF__GGEETTFFLL'' <<ffccnnttll..hh>>
''FF__SSEETTFFLL'' <<ffccnnttll..hh>>
''FF__SSEETTSSBB''* <<ffccnnttll..hh>>
''FF__SSEETTAALLFF''* <<ffccnnttll..hh>>
''FF__CCLLRRAALLFF''* <<ffccnnttll..hh>>
''OO__RRDDOONNLLYY'' <<ffccnnttll..hh>>
''OO__WWRROONNLLYY'' <<ffccnnttll..hh>>
''OO__RRDDWWRR'' <<ffccnnttll..hh>>
''OO__AACCCCMMOODDEE'' <<ffccnnttll..hh>>
''OO__NNDDEELLAAYY'' <<ffccnnttll..hh>>
''OO__AAPPPPEENNDD'' <<ffccnnttll..hh>>
''OO__SSYYNNCC'' <<ffccnnttll..hh>>
''OO__NNOONNBBLLOOCCKK'' <<ffccnnttll..hh>>
''OO__RRAAWW''* <<ffccnnttll..hh>>
''OO__SSSSDD''* <<ffccnnttll..hh>>
''OO__CCRREEAATT'' <<ffccnnttll..hh>>
''OO__TTRRUUNNCC'' <<ffccnnttll..hh>>
''OO__EEXXCCLL'' <<ffccnnttll..hh>>
''OO__NNOOCCTTTTYY'' <<ffccnnttll..hh>>
''00__BBIIGG''* <<ffccnnttll..hh>>
''OO__PPLLAACCEE''* <<ffccnnttll..hh>>
''OO__RREESSTTAARRTT''* <<ffccnnttll..hh>>
''OO__AASSYYNNCC''* <<ffccnnttll..hh>>
''OO__PPTTYYIIGGNN''* <<ffccnnttll..hh>>
''OO__SSFFSSXXOOPP''* <<ffccnnttll..hh>>
''OO__LLDDRRAAWW''* <<ffccnnttll..hh>>
''OO__WWEELLLLFFOORRMMEEDD''* <<ffccnnttll..hh>>
''OO__SSFFSS__DDEEFFEERR__TTMM''* <<ffccnnttll..hh>>
''SS__AALLFF__NNOOGGRROOWW''* <<ssyyss//ssttaatt..hh>>
''SS__AALLFF__PPAARRTTRR''* <<ssyyss//ssttaatt..hh>>
''SSEEEEKK__SSEETT'' <<ssttddiioo..hh>>
''SSEEEEKK__CCUURR'' <<ssttddiioo..hh>>
''SSEEEEKK__EENNDD'' <<ssttddiioo..hh>>
''SSTTDDIINN__FFIILLEENNOO'' PPOOSSIIXX..99
''SSTTDDOOUUTT__FFIILLEENNOO'' PPoossiixx..99
''SSTTDDEERRRR__FFIILLEENNOO'' PPoossiixx..99
* = UNICOS and UNICOS/mk systems only
Posix.9 specific errors:
''EENNOONNAAMMEE'' lliibbeerrrrnnoo..hh
''EENNOOHHAANNDDLLEE'' lliibbeerrrrnnoo..hh
Errnos 1-98 from <<eerrrrnnoo..hh>>, for example: ''EEPPEERRMM''
Cray implementation errors:
EEBBAADDIIDD If the _i_d_i_r_i_d argument is an invalid
directory ID
EEBBAADDHHAANNDDLLEE If the handle is invalid
Additional values for _c_o_n_s_t_n_a_m_e are described in
descriptions of other PXF routines such as PPXXFFAACCCCEESSSS,
PPXXFFCCHHMMOODD, PPXXFFCCRREEAATT, PPXXFFOOPPEENN, and so on.
_i_v_a_l An output integer variable. The value associated with the
constant.
_i_e_r_r_o_r An output integer variable. It contains the exit status.
EEXXIITT SSTTAATTUUSS
Upon successful completion, the argument _i_e_r_r_o_r is set to 0. If any
of the following conditions occur, PPXXFFCCOONNSSTT() sets _i_e_r_r_o_r to the
corresponding value.
EENNOONNAAMMEE Invalid constant name
EENNOOMMEEMM PPXXFFCCOONNSSTT() could not allocate the memory required
SSEEEE AALLSSOO
PPXXFFAACCCCEESSSS(3F), PPXXFFCCHHMMOODD(3F), PPXXFFCCRREEAATT(3F)
_A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
2165, for the printed version of this man page.